home *** CD-ROM | disk | FTP | other *** search
/ Family Forum 257 / SOMC Family Forum 257 - Disc 1.iso / somc / backVol.dir / 00001_Script_1 next >
Text File  |  1998-10-26  |  3KB  |  120 lines
  1.  
  2. on startMovie
  3.   
  4.   -- SET THE FIELD NAME TO BE SCROLLED BY ARROW BUTTONS
  5.   global TEXTDISPLAY
  6.   set TEXTDISPLAY to "DISPLAYFIELD"
  7.   
  8.  
  9.   glowClear()
  10.   
  11. end
  12.  
  13.  
  14. --* This handler hides/shows the glow images. eg: glow(5,TRUE) *
  15. on glow WHICHSPRITE, TRUEORFALSE
  16.   set the visible of sprite WHICHSPRITE to TRUEORFALSE
  17. end glow
  18.  
  19. --* TURN OF ALL GLOWS ON START
  20. on glowClear
  21.   repeat with i = 6 to 15
  22.     glow(i)
  23.   end repeat
  24. end
  25.  
  26. --* This handler switches the text color for a glow effect. eg.textglow("Hello",1)*
  27.  
  28. on textglow WHICHMEMBER, COLORNUMBER
  29.   set the foreColor of member WHICHMEMBER to COLORNUMBER  
  30. end textglow
  31.  
  32.  
  33. --* THIS HANDLER EXAMPLE OF DISABLEING HOTSPOTS WHEN RUNNING MIAW*
  34. --on mouseEnter
  35. --  if not count(the windowList) then
  36. --    doRollover(52,1)
  37. --  end if
  38. --end
  39. --
  40. --
  41. --on mouseLeave
  42. --  if not count(the windowList) then
  43. --    doRollout(52)
  44. --  end if
  45. --end
  46.  
  47.  
  48.  
  49. --* THIS HANDLER OPEN AND CENTERS A MOVIE IN A WINDOW *
  50.  
  51. on openMIAW MYWINDOW
  52.   set myRect=the rect of window MYWINDOW
  53.   set myStage=the rect of the Stage
  54.   set myWidth=(getAt(myRect,3)-getAt(myRect,1))
  55.   set myHeight=(getAt(myRect,4)-getAt(myRect,2))
  56.   set myLocH=((getAt(myStage,3)+getAt(myStage,1))/2)-(myWidth/2)
  57.   set myLocV=((getAt(myStage,2)+getAt(myStage,4))/2)-(myHeight/2)
  58.   set myNewRect=rect(myLocH,myLocV,(myLocH+myWidth),(myLocV+myHeight))
  59.   set the rect of window MYWINDOW=myNewRect
  60.   set the windowType of window MYWINDOW to 2
  61.   open window MYWINDOW
  62. end openMIAW
  63.  
  64.  
  65. --* THESE HANDLERS TURN ON A GLOW, TURN POINTER A HAND AND PLAYS A SOUND *
  66. --
  67. --on doRollover numsprite
  68. --  glow(numsprite,TRUE)
  69. --  global BVfinger,BVfingermask
  70. --  cursor[BVfinger,BVfingermask]
  71. --  updatestage
  72. --  puppetsound 1, "rollsound"
  73. --  --  repeat while soundbusy(1)
  74. --  --  end repeat
  75. --end
  76.  
  77.  
  78. --* THIS HANDLER TURNS THE SPRITE PASSED TO IT TO INVISIBLE AND RESETS THE CURSOR
  79. on doRollout numsprite
  80.   glow(numsprite,FALSE)
  81.   cursor 0
  82. end
  83.  
  84. --* PLAYS A CLICK SOUND
  85.  
  86. on doClick
  87.   puppetsound 1,"clicksound"
  88.   updateStage
  89. end
  90.  
  91.  
  92.  
  93. -- Delays for x number of seconds
  94. on timedelay SECONDS 
  95.   startTimer
  96.   repeat while the timer < SECONDS * 60
  97.     nothing
  98.   end repeat    
  99. end
  100.  
  101.  
  102.  
  103. on doRollover numsprite,SOUNDNUM
  104.   glow(numsprite,TRUE)
  105.   global finger,fingermask
  106.   cursor[finger,fingermask]
  107.   updatestage  
  108.   case SOUNDNUM of
  109.     1:
  110.       puppetsound 1, "rollsound"
  111.       --  repeat while soundbusy(1)
  112.       --  end repeat
  113.     2:
  114.       puppetsound 1, "rollsound2"
  115.       --  repeat while soundbusy(1)
  116.       --  end repeat      
  117.   end case  
  118. end
  119.  
  120.